From: Katsumi Yamaoka <yamaoka@jpl.org>
Date: Wed, 12 Dec 2012 22:22:31 +0000 (+0000)
Subject: gnus-art.el (gnus-article-browse-html-parts): Use <div align="left"> instead of ... 
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~3615^2~1360
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=5ea1a8d1eec3a36833c8ea360289f2fa10ef6e4b;p=emacs.git

gnus-art.el (gnus-article-browse-html-parts): Use <div align="left"> instead of <pre> to align message header
---

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 565096b6289..052c0324734 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
+2012-12-12  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+	* gnus-art.el (gnus-article-browse-html-parts): Use <div align="left">
+	instead of <pre> to align message header.
+
 2012-12-12  Sam Steingold  <sds@gnu.org>
 
 	* gnus.el (gnus-other-frame-resume-function): Add user option.
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index 9dfe119f831..43c8ca78601 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -2884,14 +2884,16 @@ message header will be added to the bodies of the \"text/html\" parts."
 		   (insert header "\n")
 		   (setq title (message-fetch-field "subject"))
 		   (goto-char (point-min))
-		   (while (re-search-forward "\\(<\\)\\|\\(>\\)\\|&" nil t)
+		   (while (re-search-forward "\\(<\\)\\|\\(>\\)\\|\\(&\\)\\|\n"
+					     nil t)
 		     (replace-match (cond ((match-beginning 1) "&lt;")
 					  ((match-beginning 2) "&gt;")
-					  (t "&amp;"))))
+					  ((match-beginning 3) "&amp;")
+					  (t "<br>\n"))))
 		   (goto-char (point-min))
-		   (insert "<pre>\n")
+		   (insert "<div align=\"left\">\n")
 		   (goto-char (point-max))
-		   (insert "</pre>\n<hr>\n")
+		   (insert "</div>\n<hr>\n")
 		   ;; We have to examine charset one by one since
 		   ;; charset specified in parts might be different.
 		   (if (eq charset 'gnus-decoded)